home *** CD-ROM | disk | FTP | other *** search
/ Computer Inter@ctive 16 / Computer Interactive cdrom 16 - dic 98.iso / swredaz / fractint / FRAIN196.ZIP / DEMO.BAT < prev    next >
Encoding:
DOS Batch File  |  1997-05-04  |  3.4 KB  |  109 lines

  1. echo off
  2. :top
  3. cls
  4. echo ************************************************************
  5. echo *                                                          *
  6. echo *  The following demonstration of Fractint will only work  *
  7. echo *  with a VGA or higher resolution video system.           *
  8. echo *  The demo should be run in a directory containing all    *
  9. echo *  the Fractint release files.                             *
  10. echo *                                                          *
  11. echo ************************************************************
  12. echo.
  13. echo 0:  Exit
  14. echo 1:  Basic commands demo
  15. echo 2:  New stuff in version 19
  16. echo 3:  New stuff in version 19.4
  17. echo 4:  New stuff in version 19.5
  18. echo 5:  New stuff in version 19.6
  19. echo 6:  Advanced commands demo
  20. echo 7:  All six demos
  21. sschoice
  22. echo.
  23. if errorlevel 8 goto top
  24. if errorlevel 7 goto all
  25. if errorlevel 6 goto advanced
  26. if errorlevel 5 goto newin196
  27. if errorlevel 4 goto newin195
  28. if errorlevel 3 goto newin194
  29. if errorlevel 2 goto newin19
  30. if errorlevel 1 goto basic
  31. if errorlevel 0 goto end
  32. goto top
  33.  
  34. :advanced
  35. fractint savename=.\ filename=.\ curdir=yes @demo.par/Mandel_Demo autokey=play autokeyname=advanced.key
  36. goto top
  37.  
  38. :newin19
  39. fractint savename=.\ filename=.\ curdir=yes @demo.par/Mandel_Demo autokey=play autokeyname=new19.key
  40. del new19???.gif
  41. goto top
  42.  
  43. :newin194
  44. fractint savename=.\ filename=.\ curdir=yes @demo.par/trunc_Demo autokey=play autokeyname=new19-4.key
  45. del new1940?.gif
  46. goto top
  47.  
  48. :newin195
  49. set r=n195b
  50. goto n195s
  51. :n195b
  52. del demo195.par
  53. goto top
  54.  
  55. :newin196
  56. fractint savename=.\ filename=.\ curdir=yes autokey=play autokeyname=new19-6.key
  57. del demo196?.gif
  58. goto top
  59.  
  60. :basic
  61. fractint savename=.\ filename=.\ curdir=yes @demo.par/Mandel_Demo autokey=play autokeyname=basic.key
  62. del basic001.gif
  63. goto top
  64.  
  65. :all
  66. fractint savename=.\ filename=.\ curdir=yes @demo.par/Mandel_Demo autokey=play autokeyname=basic.key
  67. fractint savename=.\ filename=.\ curdir=yes @demo.par/Mandel_Demo autokey=play autokeyname=new19.key
  68. fractint savename=.\ filename=.\ curdir=yes @demo.par/trunc_Demo autokey=play autokeyname=new19-4.key
  69. set r=allb
  70. goto n195s
  71. :allb
  72. fractint savename=.\ filename=.\ curdir=yes autokey=play autokeyname=new19-6.key
  73. fractint savename=.\ filename=.\ curdir=yes @demo.par/Mandel_Demo autokey=play autokeyname=advanced.key
  74. del basic001.gif
  75. del new19???.gif
  76. del new1940?.gif
  77. del demo195.par
  78. del demo196?.gif
  79. goto top
  80.  
  81. :n195s
  82. cls
  83. echo.
  84. echo   This autokey demonstrates the new "comment=" and "colors=" commands
  85. echo   ===================================================================
  86. echo.
  87. echo   It will draw the classic Mandel fractal, then:
  88. echo.
  89. echo   - load default.map
  90. echo   - enter "recordcolors=comment"
  91. echo           The compressed palette will be written in the par entry and
  92. echo           the .map file will be in a comment
  93. echo   - enter "comments=$date$/$xdots$_x_$ydots$/On_a_Pentium_166/$calctime$
  94. echo           These comments will be expanded as follow in the par:
  95. echo           Mandel_demo { ; Aug 26, 1996
  96. echo                         ; 160 x 100
  97. echo"                        ; On a Pentium 166
  98. echo                         ;  0:00:00.07
  99. echo   - make a par called "Mandel_Demo"
  100. echo   - load this par and let you see with F2 the complete par entry
  101. echo   - exit
  102. echo.
  103. pause
  104. fractint savename=.\ filename=.\ curdir=yes @demo.par/Mandel_Demo autokey=play autokeyname=new19-5.key
  105. goto %r%
  106.  
  107. :end
  108. echo Have a nice day!
  109.